home *** CD-ROM | disk | FTP | other *** search
/ PC Pro 2005 June (DVD) / DPPRO0605DVD.iso / Install / program files / Borland / BDS / 3.0 / Demos / Delphi.Net / CLR / Remoting / uRNGintf.pas < prev    next >
Encoding:
Pascal/Delphi Source File  |  2004-10-22  |  958 b   |  28 lines
  1. unit uRNGintf;
  2. //------------------------------------------------------------------------------
  3. //  Last updated:   11/06/03
  4. //  Author:         Dennis Passmore
  5. //  Company:        Ultimate Software, Inc.
  6. //  Contact info:   dennis_passmore@ultimatesoftware.com
  7. //
  8. //  Compatibility:  Delphi for .NET HTTP service demo
  9. //
  10. //  Description:    TNTKeyService class implements base .NET service class.
  11. //                  TLockserver class implements base ILockserver which is
  12. //                  exported via .NET Remoting
  13. //
  14. //------------------------------------------------------------------------------
  15. interface
  16.  
  17. type
  18.   ILockserver = interface
  19.     function ExtendLock(const fKey: widestring): boolean;
  20.     function Lockitem(const fItem: widestring; out fKey: widestring): boolean;
  21.     function IsItemLocked(const fItem: widestring): boolean;
  22.     function UnLockitem(const fKey: widestring): boolean;
  23.   end;
  24.  
  25. implementation
  26.  
  27. end.
  28.